home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / bbs / mxgui203.zip / GUI_ANSI.TXT < prev    next >
Text File  |  1997-08-11  |  2KB  |  45 lines
  1. {
  2. ───────────────────────────────────────────────────────────────────────────────
  3.   ▀▀▀   ▀▀▀   ▀▀▀▀▀   ▀▀   ▀▀
  4.   ▀▀▀▀ ▀▀▀▀  ▀▀   ▀▀   ▀▀ ▀▀
  5.   ▀▀ ▀▀▀ ▀▀  ▀▀▀▀▀▀▀    ▀▀▀    ╔══ ╦═╗ ╔═╗ ╦═╗ ╦ ╦ ╦ ╔═╗ ╔═╗
  6.   ▀▀  ▀  ▀▀  ▀▀   ▀▀   ▀▀ ▀▀   ║ ╦ ╠╦╝ ╠═╣ ╠═╝ ╠═╣ ║ ║   ╚═╗
  7.   ▀▀     ▀▀  ▀▀   ▀▀  ▀▀   ▀▀  ╚═╝ ╩╚═ ╩ ╩ ╩   ╩ ╩ ╩ ╚═╝ ╚═╝
  8. ───────────────────────────────────────────────────────────────────────────────
  9.   The MAX Graphics GUI Kit is Copyright 1995-Current Larry L. Athey (LA-Soft).
  10.   Color Averaging procedures are courtesy of Sean Price (Rude Dog Software).
  11. ───────────────────────────────────────────────────────────────────────────────}
  12.  
  13. INTERFACE
  14.  
  15. PROCEDURE Display_ANSI(Ch : CHAR);
  16. {^ Processes a character from an ANSI or ASCII text string.                    }
  17. PROCEDURE Display_ANSIstr(S : STRING);
  18. {^ Processes an entire ANSI or ASCII text string.                              }
  19. PROCEDURE Goto_XY(X1,Y1 : BYTE);
  20. {^ Equivalent to GotoXY in text mode.                                          }
  21. PROCEDURE Clr_Scr;
  22. {^ Equivalent to ClrScr in text mode.                                          }
  23. PROCEDURE Clr_Eol;
  24. {^ Equivalent to ClrEol in text mode.                                          }
  25. PROCEDURE PlaceCursor;
  26. {^ Plots a bogus cursor on the screen (for visual reference only).             }
  27. PROCEDURE EraseCursor;
  28. {^ Erases the bogus cursor.                                                    }
  29. PROCEDURE ResetANSI;
  30. {^ Resets all variables in this unit.                                          }
  31.  
  32. VAR
  33.   RowLimit    : BYTE;    {Maximum number of text rows to display.              }
  34.   ColLimit    : BYTE;    {Maximum number of text columns to display.           }
  35.   StartX      : INTEGER; {ANSI window upper left X SVGA coordinate.            }
  36.   StartY      : INTEGER; {ANSI window upper left Y SVGA coordinate.            }
  37.   Where_X     : BYTE;    {Equivalent to WhereY in text mode.                   }
  38.   Where_Y     : BYTE;    {Equivalent to WhereX in text mode.                   }
  39.   ANSI_FG     : INTEGER; {Stores current foreground color.                     }
  40.   ANSI_BG     : INTEGER; {Stores current background color.                     }
  41.   CursorOn    : BOOLEAN; {Is the simulated ANSI cursor on?                     }
  42.   HandleMouse : BOOLEAN; {Turn the mouse cursor on/off automatically? [Y/N]    }
  43.  
  44. {──────────────────────────────────────────────────────────────────────────────}
  45.